home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / TwoRings.dxr / 00074_guy eyes.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  521 b   |  20 lines
  1. property spriteNum, pSprite, pLoc
  2.  
  3. on beginSprite me
  4.   pSprite = sprite(spriteNum)
  5.   pLoc = pSprite.loc
  6.   timeout("girl eye1" & string(spriteNum)).new(1000, #lookover, me)
  7. end
  8.  
  9. on lookover me
  10.   timeout("girl eye1" & string(spriteNum)).forget()
  11.   pSprite.loc = point(pLoc[1] + 5, pLoc[2])
  12.   timeout("girl eye2" & string(spriteNum)).new(8000, #lookaway, me)
  13. end
  14.  
  15. on lookaway me
  16.   timeout("girl eye2" & string(spriteNum)).forget()
  17.   pSprite.loc = pLoc
  18.   timeout("girl eye1" & string(spriteNum)).new(5000, #lookover, me)
  19. end
  20.